ＴＬ／１−ＭＳＸ　ＴＬ−Ｘ ――――――――――――――――――――――――――――――――――――――― アスキー　１９８４年　７月号掲載 ＭＳＸ マシン語　０ＣＥ００Ｈ−０Ｆ１ＢＦＨ　Ｓ：０ＣＥ００Ｈ 起動方法 ディスクを切り離して（SHIFTキーを押しながら起動） ＣＬＥＡＲ　１００，＆ＨＣＤＦＦ ＢＬＯＡＤ”ＣＡＳ：”，Ｒ ――――――――――――――――――――――――――――――――――――――― ＴＬ／１が産声を上げてから４年の月日が通過しました。 この間に、Ｈ６８ＴＲワンボードマイクロコンピュータを始めとして、 ＰＣ−８００１、Ａｐｐｌｅ　IIなど、多くの機種に移植され ＧＡＭＥに続くアスキーの標準言語の一つとなっています。 そして、今ここにＭＳＸマシンの機能を最大限に活用するための ＴＬ／１−ＭＳＸの第１回をお届けします。 今回は、ＴＬ／１−ＭＳＸの全リスト、リファレンス、 簡単な操作法等について解説をします。 第２回（来月予定）では、内部の詳細な説明、 ＭＳＸのＲＯＭＯＳ等についてを予定しています ■■■■■■■■■■■■■■■■■■■ 　　　　　　　　概要 ■■■■■■■■■■■■■■■■■■■ ＴＬ／１−ＭＳＸ（以下ＴＬ／Ｘと呼ぶ）のオリジナルはＴＬ／１−ＰＣです。 ＭＳＸマシンの場合は、機械語モニタを持たないため、 ＴＬ／Ｘでは、６月号で紹介したエディタ・アセンブラ用のモニタに 一部改良を加えて使用しています。 エディタにも改良を加え専用としてあります。 従来のＴＬ／１では、ＢＡＳＩＣのエディタで ソースプログラムを作成していましたが、 ＴＬ／Ｘでは、ＭＳＸのメモリ容量の関係で 専用のものを用意しました。 これにより、ソースプログラム作成から、 コンパイイルまでの操作手順が短縮され、 モニタ、コンパイラ本体、エディタが一つにパックされた 『ＴＬ／１システム』が構築されます。 言語仕様自体は既存のＴＬ／１と 完全にコンパチビリティーを保ちつつ、 ＭＳＸマシンの機能を活かすための拡張がされています。 特にグラフィック関係は、 ＭＳＸ−ＢＡＳＩＣのDRAW文以外の 殆ど全ての命令をサポートしています。 また、サウンド関係も、ＢＡＳＩＣのPLAY文に相当する 簡単なＢＧＭ機能を持っています。 しかし、何といっても最大の特徴は、 専用エディタを採用したことにより、 『インタープリタ感覚』で使えるようになったことです。 つまり、コンパイル中にエラーが発生すると、 自動的にエディタが起動され、エラーが発生した個所を表示し、 エディット状態になります。 このシステムは、当然ＲＡＭ16Ｋｂｙｔｅの ＭＳＸマシンでも十分使えるように設計されています。 ただし、16Ｋｂｙｔｅマシンではソースプログラムエリアが少ないので、 １度に大きなプログラムをエディットすることができません。 そのため、ソースプログラムを幾つかに分割して入力し、 これをカセットテープ上でリンクして、 カセットを読み込みながらコンパイルする機能を用意しました。 これにより、16Ｋｂｙｔｅマシンでも、 ランタイムルーチンを含まない純粋なオブジェクトにして 約 5.5Ｋｂｙｔｅまでのプログラムをコンパイルすることができます。 ということは、32Ｋｂｙｔｅマシンでは 何と２１Ｋｂｙｔｅ以上のオブジェクト生成が可能になるわけです。 以上のように、ＴＬ／Ｘは機能的には 現時点での『最強のＴＬ／１』ということができるでしょう。 コンパイルしかオブジェクトの実行速度については 残念ながら最速とは言えませんが、 オリジナルとなったＴＬ／１−ＰＣやＴＬ／１−Ａｐｐｌｅ以上の 実行速度は実現しています。 ただし、ＴＬ／１−ＰＣより速いのは、 単に実質的なクロック周波数の違いによるものです （ＣＰＵは同じＺ80Ａで、４ＭＨｚのＰＣが 　約 3.5ＭＨｚのＭＳＸより遅いのは変だ、と思われるでしょう。 　実際にはハードウェアの設計法の違いにより、 　このようなことが起こり得るのです）。 ■■■■■■■■■■■■■■■■■■■ 　　　　　　起動するまで ■■■■■■■■■■■■■■■■■■■ ダンプリストから手で入力される方は、 本誌84年１月号P. 277に掲載された 「ＢＡＳＩＣ簡易モニタ」を利用すればよいでしょう。 この場合はモニタプログラムの先頭に以下のリストを追加してから 実行して下さい。 ・―――――――――――――――――・ ｜10 CLEAR 100,&HCDFF 　　　　　　　｜ ・―――――――――――――――――・ 月刊テープアスキーから起動する場合は、 最初にローダープログラムをロード・実行し、 ローダープログラムの指示に従ってＴＬ／Ｘ本体をロードします。 この場合のファイル名は“LOADER”です。 ローダープログラムはC800Ｈ番地からスタートするので、 ローダープログラムを実行する前に ・―――――――――――――――――・ ｜CLEAR 100,&HC7FF　　　　　　　　　｜ ・―――――――――――――――――・ をダイレクトコマンドで必ず実行して下さい。 MSX-Editor Assembler plusの記事でも使用した この２段階のロード方法は、チエックサムによるロードを行うためで、 この方法により、ロード時のロードミスを発見することができ、 実行したら暴走してしまった、という危険を回避できます。 いずれの場合も、メモリにプログラムが入力されたら、 以下の方法で、このプログラムのバックアップを作成します。 ・―――――――――――――――――・ ｜BSAVE"CAS:TL/X",&HCE00,&HF1BF 　　｜ ・―――――――――――――――――・ スタート番地はCE00Ｈです。 ・―――――――――――――――――・ ｜DEFUSR=&HCE00 　　　　　　　　　　｜ ｜X=USR(0)　　　　　　　　　　　　　｜ ・―――――――――――――――――・ とすることにより、エディタが起動します。 また、バックアップテープからＴＬ／Ｘをロード・実行する場合は ・―――――――――――――――――・ ｜CLEAR 100,&HCDFF　　　　　　　　　｜ ｜BLOAD"CAS:TL/X",R 　　　　　　　　｜ ・―――――――――――――――――・ とします。 ■■■■■■■■■■■■■■■■■■■ 　　　　エディタ ■■■■■■■■■■■■■■■■■■■ エディタには、MSX-Editor Assembler plusのエディタと ほぼ同じものを使用しています。 殆どのコマンドが共通なので、 ここでは、変更されたコマンド、 追加されたコマンドについてのみ解説します。 共通のコマンドについては本誌６月号 MSX-Editor Assembler plus記事中の エディタの解説を参照して下さい。 表１にエディタの全コマンドを示します。 このエディタはポインタ形式を採用しており、 ポインタは行単位で移動することができます。 画面最下行に現れるエディタのプロンプト“＞”のすぐ上の行に 表示されているテキストがあれば、 それがポインタの指している行ということになります。 場合は、“Ｎ”コマンドを使用することにより、 現在ポインタの指している行を表示させることができます。 これらの場合、テキストの代わりに“＾”マークが表示されたら、 ポインタがテキストの底にある、 即ちポインタの後ろには何もテキストが無いことを示しています。 ポインタの移動は表１に上げたコマンド以外に、 [RETURN]、[BS]キーを使用することにより リストのアップ・ダウンスクロールを行うことができます。 エディタプロンプトに続けて[RETURN]キーのみを入力すると、 ポインタは１行下がり、 同時に新しくポインタが指した行を表示します。 [BS]キーはこれと逆の処理で、 ポインタを１行上げ１行表示します。 これらのキーをうまく使うと、 ポインタを目的の行に素早く移動することがてきます。 このポインタを基準に、テキストを挿入−削除あるいは修正するわけです。 エディタのプロンプトが出ている「コマンド・モード」から “Ｉ”または“Ｂ”コマンドによって「インサート・モード」に入り、 テキストの連続挿入ができます。 この時、[ＴＡＢ]キーはちょっと変わった働きをします。 ＴＬ／１もそうですが、アルゴル系の言語では テキストのインデント（段付け）を多用します。 この時始めは、普通にスペースキーにより、 必要な数だけスペースを入力しインデントをしますが、 次の行からは[ＴＡＢ]キーを入力することにより、 上の行と同じだけのスベースをテキストに挿入することができます。 インデントの量を変えるときは、スペースキーまたは[BS]キーで調整します。 このインデント量は、テキストを行の先頭から書いた場合にもクリアされず、 最後にインデントを付けた時の量を記憶しています。 ここで気になるのが、インデントを付けたことにより、 スベースの分だけメモリを消費してしまうのではないか、 という心配です。 ＢＡＳＩＣなどでは、リスト中のスペースも１キャラクタとして判断されるので、 スペースの数に比例してメモリも消費されますが、 このエディタではメモリ消費を心配する必要はありません。 [ＴＡＢ]キーによるインデントのスベースは、 インデント量をコード化しているため、 ２バイト以上メモリを消費しません。 もちろん行の先頭からスペース以外の文字が入る場合は、 テキストがそのまま記憶されます。 インサートモードでは、 カーソルキーや[ＩＮＳ]、[ＤＥＬ]キーなどの修正キーは使えません。 誤った入力は[ＢＳ]キーで消去してから再入力して下さい。 また、インサートモードを抜けるには[RETURN]キーのみを入力します。 なお、行番号はエディタが自動的に付けるので入力する必要はありません。 １行をスクリーンエディットするには、 “Ｅ”コマンドまたは[↑]キーを使用して、 「エディットモード」に入ります。 エディットモードに入ると、 エディットしようとする行が行番号無しでスクリーンに表示され、 カーソルが行の先頭に現れます。 このモードではＢＡＳＩＣのテキストをエディットするのと同様に ＭＳＸの全ての修正キーが使えます。 通常は、[RETURN]の入力により、エディットモードを抜けますが、 この時、[↑]キーを使用してエディットモードに入った場合のみ ポインタが１行下がります。 ここで再び[↑]キーを押せばその行をエディットできるので [↑]キーは連続して行をエディットするときに便利な機能です。 アセンブラのエディタのコマンドとは 機能が少し異なるコマンドについて説明します。 まずポインタの移動およびリスト表示コマンドのうち “Ｖ”、“Ｐ”、“Ｕ”コマンドにおいて 上下するポインタの行数は、アセンブラ用エディタでは21行でしたが、 ＴＬ／Ｘ用エディタでは10行となっています。 これはＴＬ／Ｘの場合、プログラムとしては１行でも画面上では、 複数行にわたるテキストが多いので、21行表示したのでは、 １画面に入りきらないことが多いためです。 アセンブラのエディタでは、 “Ｆ”コマンドは特定の文字列で始まる行を探すものでしたが、 ＴＬ／Ｘのエディタでは行の途中の文字列を探すことが可能になっています。 ＴＬ／１のようなソーステキストでは、 このようにしないとコマンドの持つ意味が無くなってしまいます。 表１　ＴＬ／１−ＭＳＸエディタコマンド ・―――――――――――――――――――――――――――――――――――――・ ｜:コマンド:｜:一般型:｜意::::::味｜::::例::::::｜::::::機::::::::::能::::::｜ ｜―――――＋――――＋―――――＋――――――＋―――――――――――――｜ ｜　　　　　｜I ｜Insert ｜I ｜(PT)の上にﾃｷｽﾄを連続挿入　｜ ｜入力　　　｜In ｜Insert n ｜I32 ｜ｎ行の上にﾃｷｽﾄを連続挿入　｜ ｜　　　　　｜B ｜Bottom ｜B ｜PTを底にしてﾃｷｽﾄを連続挿入｜ ｜―――――＋――――＋―――――＋――――――＋―――――――――――――｜ ｜ 　 ｜Dn ｜Delete ｜D5 ｜(PT)からｎ行削除　　　　　｜ ｜削除　　　｜D,n ｜Delete n ｜D,7 ｜ｎ行目からPTの上までを削除｜ ｜　　　　　｜K. ｜Kill ｜K. ｜全ﾃｷｽﾄを削除　　　　　　　｜ ｜―――――＋――――＋―――――＋――――――＋―――――――――――――｜ ｜　　　　　｜T ｜Top ｜T ｜PTを０行にする　　　　　　｜ ｜　 ｜Tn ｜Top n ｜T23 ｜PTをｎ行にする　　　　　　｜ ｜　　　　　｜Bn ｜Bottom ｜B4 ｜PTを底からｎ行目にする　　｜ ｜ﾎﾟｲﾝﾀ移動 ｜U ｜Up ｜U ｜PTを10行上げる　　　　　　｜ ｜　　　　　｜￣ ｜ ｜ ｜ ｜ ｜　　　　　｜un ｜Up n ｜U34 ｜PTをｎ行上げる　　　　　　｜ ｜　　　　　｜Nn 　　｜Next ｜N5 ｜PTをｎ行下げる　　　　　　｜ ｜―――――＋――――＋―――――＋――――――＋―――――――――――――｜ ｜　　　　　｜P ｜Print ｜P ｜PTを10行下げながら10行表示｜ ｜　　　　　｜￣ ｜ ｜ ｜ ｜ ｜　　　　　｜Pn ｜Print n ｜P10 ｜PTをｎ行下げながらｎ行表示｜ ｜　　　　　｜V ｜View ｜V ｜PTを10行上げ10行表示　　　｜ ｜　　　　　｜￣ ｜ ｜ ｜ ｜ ｜ﾘｽﾄ表示 ｜A ｜An ｜A ｜全ﾃｷｽﾄを表示　　　　　　　｜ ｜　　　　　｜N ｜ ｜N ｜(PT)を表示　　　　　　　　｜ ｜　　　　　｜Q ｜ ｜Q ｜行番号なしに(PT)以後を表示｜ ｜　　　　　｜QP ｜ ｜QP ｜行番号なしに(PT)以後を印字｜ ｜―――――＋――――＋―――――＋――――――＋―――――――――――――｜ ｜　　　　　｜E ｜Edit ｜E ｜(PT)をｽｸﾘｰﾝｴﾃﾞｨｯﾄ 　　　　｜ ｜　　　　　｜En ｜Edit n ｜E52 ｜ｎ行目をｽｸﾘｰﾝｴﾃﾞｨｯﾄ 　　　｜ ｜修正　　　｜Rs ｜Retype ｜Rvar i ｜(PT)を　に置換　　　　　　｜ ｜　　　　　｜Xds1ds2 ｜exchange ｜X $i $j ｜(PT)のs1をs2に置換　　　　｜ ｜―――――＋――――＋―――――＋――――――＋―――――――――――――｜ ｜　　　　　｜Fs ｜Find ｜Floop ｜PTの次からsを含む行を探す ｜ ｜検索置換　｜Ms ｜Match ｜Mcpl ｜PTの次からsを含む行を ｜ ｜　　　　　｜ ｜ ｜ ｜ 全て表示｜ ｜　　　　　｜Ydslds ｜ ｜Y$i$j ｜PT以下全行のs1をs2に置換 ｜ ｜―――――＋――――＋―――――＋――――――＋―――――――――――――｜ ｜移動　　　｜Wn1,n2 ｜Warp ｜W20,36 ｜n1〜n2行を(PT)の上に移動 ｜ ｜―――――＋――――＋―――――＋――――――＋―――――――――――――｜ ｜　　　　　｜Ss ｜Save ｜Stext ｜全ﾃｷｽﾄをﾌｧｲﾙsでｾｰﾌﾞ ｜ ｜　　　　　｜Ls ｜Load ｜Lmsx ｜(PT)の上にﾌｧｲﾙsをﾛｰﾄﾞ ｜ ｜　　　　　｜Z ｜　　　　　｜Z ｜ﾃｷｽﾄを255文字ずつ ｜ ｜　　　　　｜￣ ｜ ｜ ｜ ｱｽｷｰｾｰﾌﾞする｜ ｜入出力　　｜ZZ ｜ ｜ ｜ﾃｷｽﾄを255文字ずつ ｜ ｜　　　　　｜￣ ｜ ｜ ｜ ｱｽｷｰｾｰﾌﾞする(ｴﾝﾄﾞﾏｰｸ付き)｜ ｜―――――＋――――＋―――――＋――――――＋―――――――――――――｜ ｜　　　　　｜O ｜go to Os ｜O ｜MSXﾓﾆﾀをｺｰﾙ ｜ ｜　　　　　｜Gx ｜Go ｜Gb000 ｜X番地をｺｰﾙ ｜ ｜特殊　　　｜PS ｜Print　 ｜PS ｜残り領域と使用領域を表示 ｜ ｜　　　　　｜ ｜ Status｜ ｜ ｜ ｜　　　　　｜H ｜Hard Copy ｜H ｜ﾌﾟﾘﾝﾀ出力のON/OFF ｜ ｜―――――＋――――＋―――――＋――――――＋―――――――――――――｜ ｜　　　　　｜C ｜Compile ｜C ｜ｵﾌﾞｼﾞｪｸﾄを作成しない ｜ ｜　　　　　｜￣ ｜ ｜ ｜ 空ｺﾝﾊﾟｲﾙを行う｜ ｜　　　　　｜CO ｜Compile ｜CO ｜ｺﾝﾊﾟｲﾙを行いｵﾌﾞｼﾞｪｸﾄを ｜ ｜　　　　　｜￣ ｜ to Object｜ ｜ 作成する｜ ｜　　　　　｜CT ｜Compile ｜ ｜Zｺﾏﾝﾄﾞでｾｰﾌﾞされたﾃｷｽﾄを ｜ ｜　　　　　｜￣ ｜ From ｜ ｜ｶｾｯﾄから読みながらｺﾝﾊﾟｲﾙを｜ ｜ ｜ ｜ Cassette｜ ｜行う ｜ ｜ ｜ ｜ Tape｜ ｜ ｜ ・―――――――――――――――――――――――――――――――――――――・ ※＿で示された命令は、拡張または変更された命令を示す。 ※nは10進数、xは16進数、sは文字列、dはデリミタでsに含まれない任意の文字。 ※n、xに不適当な文字列を含むと、その前の文字までが有効となる。 ※PTはポインタ、(PT)はポインタの示す行を表す。 ■■■■■■■■■■■■■■■■■■■ 　　　　　コンパイラの起動 ■■■■■■■■■■■■■■■■■■■ エディタの“Ｃ”、“ＣＯ”、“ＣＴ”コマンドにより、 コンパイラが起動します。 “Ｃ”コマンドは「空コンパイル」を行うもので、 オブジェクトをメモリに作成しません。 メモリ中にコンパイルしたオブジェクトを作成する場合は “ＣＯ”コマンドを使用します。 何れの場合も、コンパイル終了時には、 ソーステキストエリア及び オブジェクトプログラムエリアの表示が行われます。 ここでのオブジェクトエリアというのはランタイムルーチンを含まない、 ソーステキストがコンパイルされたオブジェクトです。 16ＫＲＡＭのＭＳＸマシンや大きなソーステキストをコンパイルする際は、 まず空コンパイルを行いオブジェクトエリアとソースエリアが 重ならないことを確認すれば、 大切なソーステキストを壊してしまうことはありません。 ソースプログラムがメモリに入りきらないような場合には、 ソースをメモリに入る分づつに区切ってテープにセーブし、 後でまとめてテープを読み込みながらコンパイルすることができます。 この場合、１回分のテキストをテープにセーブするのに “Ｚ”コマンドを使用します。 ただし、コンパイラにプログラムの終わりを知らせてやる必要があるので、 プログラムの最後のテキストをセーブする場合のみ “ＺＺ”コマンドを使用します。 これにより、テキストにエンドマークが自動的に挿入され、 このテープの読み込みが終了するとコンパイルも終了します。 それぞれのテキストは１本のテープに、 プログラムの順番通りに続けてセーブします。 このようにして、テープにセーブされたプログラムをコンパイルするには、 “ＣＴ”コマンドを使用します。 テープの再生準備をしてからコンパイラを起動して下さい。 “Ｚ”、“ＺＺ”コマンドでセーブしたテープはコンパイラ専用で、 エディタでは読み込むことができません。 作成したソースプログラムを保存する場合は、 必ず“Ｓ”コマンドでファイルネーム付きのセーブをして下さい。 コンパイル終了時には、“Ｃ”コマンドでコンパイラを起動したときのみ、 エディタに戻りますが、 他の場合はモニタに飛びます。 特に“ＣＴ”コマンドを使用した場合は エディタのプログラムが壊されているのが普通なので、 モニタからエディタに戻ることは避けて下さい。 ■■■■■■■■■■■■■■■■■■■ 　　　　　　　モニタ ■■■■■■■■■■■■■■■■■■■ モニタはエディタの“Ｏ”コマンドを使用したときや、 オブジェクトをメモリに生成しながらコンパイルした後に起動されます。 コマンドは、アセンブラに付属のモニタと殆ど同じなので、 ここでは新しく追加されたコマンドについてのみ説明をします。 新設コマンド以外については、アセンブラのコマンド解説を参照して下さい。 なお、コマンドの一覧を表２にまとめておきました。 モニタからエディタに戻るのに、 アセンブラでは“Ｂ”コマンドを用いましたが、 ＴＬ／Ｘのモニタでは“Ｔ”コマンドを用います。 これは、名前が変わったばかりでなく機能も異なっています。 “Ｂ”コマンドはモニタをコールしたプログラムに戻るものだったのに対し、 “Ｔ”コマンドはテキストエディタにジャンプします。 これは、コンパイル時にエラーを起こして モニタに飛んだ場合に再度コンパイラに戻ってもしかたがないからです。 コンパイルしたオブジェクトは、 モニタの“Ｏ”コマンドで即実行することができます。 このコマンドはコンパイルした後、 エディタに戻ったりしてオブジェクトプログラムを壊さない限り、 何度でも使用できます。 ソーステキストに戻るとオブジェクトが壊れるのは、 ソーステキストエリアとオブジェクトエリアが 同じ領域を使っているためです。 “Ｏ”コマンドでは、 オブジェクトが壊されたかどうかの簡単なチェックを行い、 壊された場合には何もしません。 ＴＬ／Ｘでは、実際のオブジェクトは ランタイムルーチン（E700H〜EC0BH）とは離れた位置に作成されます。 このような構造とすることにより、 異なったメモリシステム（16／32Ｋｂｙｔｅ）に 容易に対応できる等の利点が生まれるのですが、 コンパイルしかオブジェクトのみを単独に利用した場合などは、 テープのロード／セーブがやっかいになります。 そこで、この点を解消するために、“Ｂ”コマンドを用意しました。 使い方はファイルこそ指定して、例えば次のようにします。 ・―――――――――――――――――・ ｜＊ＢＯＢＪ　　　　　　　　　　　　｜ ・―――――――――――――――――・ これにより、純粋なオブジェクトとランタイムルーチン、 それにオブジェクトを転送して起動する プログラムの３つがひとまとめになって “ＯＢＪ”というファイルネームでセーブされます。 こうして出来上がったプログラムは ・―――――――――――――――――・ ｜ＢＬＯＡＤ”ＣＡＳ：ＯＢＪ”，Ｒ　｜ ・―――――――――――――――――・ とすることにより、ロードして自動的に実行することができます。 その他の注意点としては、 テープのロード／セーブ中に[CTRL]-[STOP]キーを押すと ＢＡＳＩＣに戻ってしまう場合があります。 そんな時には[Ｆ５]キーを押すことにより、 エディタに、[Ｆ10]キーによリモニタに復帰することができます。 これは、どのようにしてＢＡＳＩＣに戻った場合にも使えます。 ただし、ＢＡＳＩＣに戻ったとき、エラーとなるようなことをすると、 まれに暴走することがあるので注意して下さい。 表２　モニタコマンド ・―――――――――――――――――――――――――――――――――――――・ ｜::::一::般::型::::｜::意::昧::｜::::例::::｜::::::::機::::::::::能::::::::｜ ｜―――――――――＋―――――＋―――――＋―――――――――――――――｜ ｜C〔st〔,en〕〕 ｜Check-sum ｜CB000,BFFF｜stからenのｱﾄﾞﾚｽのﾁｪｯｸｻﾑ付き ｜ ｜ ｜ ｜ ｜ 　　 ﾀﾞﾝﾌﾟ｜ ｜D〔st〔,en〕〕 ｜Dump ｜D100 ｜stからenのｱﾄﾞﾚｽのｱｽｷｰｷｬﾗｸﾀ付き｜ ｜ ｜ ｜ ｜　 　　　ﾀﾞﾝﾌﾟ｜ ｜―――――――――＋―――――＋―――――＋―――――――――――――――｜ ｜Esl,ad ｜Enable ｜E20,4000 ｜slでｽﾛｯﾄ、adでｱﾄﾞﾚｽを指定して､｜ ｜ ｜ ｜ ｜そのｽﾛｯﾄをｱｸｾｽ可能とする。 ｜ ｜ ｜ ｜ ｜slは2桁の16進数で、上位で ｜ ｜ ｜ ｜ ｜ﾌﾟﾗｲﾏﾘ、下位でｾｺﾝﾀﾞﾘｽﾛｯﾄを ｜ ｜ ｜ ｜ ｜指定する ｜ ｜―――――――――＋―――――＋―――――＋―――――――――――――――｜ ｜Fst,eb,de ｜Fill ｜F9000,91FF｜stからenのｱﾄﾞﾚｽのﾒﾓﾘを ｜ ｜ ｜ ｜ 　　,12 ｜ﾃﾞｰﾀdtで埋める ｜ ｜Mst,en,de ｜Move ｜M0,1FFF ｜stからenのｱﾄﾞﾚｽにあるﾃﾞｰﾀを ｜ ｜ ｜ ｜ ,A000｜deのｱﾄﾞﾚｽに転送 ｜ ｜―――――――――＋―――――＋―――――＋―――――――――――――――｜ ｜S〔st〕 ｜Set ｜DB000 ｜stのｱﾄﾞﾚｽからﾒﾓﾘ内容を変更 ｜ ｜ ｜ ｜ ｜する。[RETURN]のみの入力で ｜ ｜ ｜ ｜ ｜ｱﾄﾞﾚｽが1つ進み[BS]で1つ戻る。 ｜ ｜ ｜ ｜ ｜終了には"."を入力 ｜ ｜―――――――――＋―――――＋―――――＋―――――――――――――――｜ ｜T ｜Text ｜T ｜ｴﾃﾞｨﾀを起動する ｜ ｜￣ ｜ editor｜　　　　　｜ ｜ ｜Gad ｜Go ｜GC800 ｜adのｱﾄﾞﾚｽをｺｰﾙする ｜ ｜O ｜Object ｜O ｜ｺﾝﾊﾟｲﾙしたｵﾌﾞｼﾞｪｸﾄを実行する ｜ ｜￣ ｜ ｜ ｜　 　　　 ｜ ｜―――――――――＋―――――＋―――――＋―――――――――――――――｜ ｜Rfn〔,R〔，of〕〕 ｜Read ｜Robj,r ｜BASICのBLOAD"CAS:"ｺﾏﾝﾄﾞと同じ ｜ ｜Wfn,st,en〔,ｒｎ〕｜Write ｜Wbas,0 ｜BASICのBSAVE"CAS:"ｺﾏﾝﾄﾞと同じ ｜ ｜ ｜ ｜ ,7fff,0｜ ｜ ｜Bfilename ｜Bsave ｜Bmsx ｜ｵﾌﾞｼﾞｪｸﾄをﾗﾝﾀｲﾑﾙｰﾁﾝと共に ｜ ｜￣￣￣￣￣ ｜ ｜ ｜ﾃｰﾌﾟにｾｰﾌﾞする ｜ ｜―――――――――＋―――――＋―――――＋―――――――――――――――｜ ｜^P ｜Printer ｜^P ｜ﾌﾟﾘﾝﾀに対する出力をON/OFFする ｜ ・―――――――――――――――――――――――――――――――――――――・ ※オブジェクトは独立でセーブしても、実行することが可能である。 ただしこの場合は、開始番地はランタイム先頭ではなく、 　常に生成したオブジェクトの先頭アドレスとなる。 ※ＴＬ／１のオブジェクト実行終了後はＢＡＳＩＣに戻る。 　エディタに移るには[Ｆ５]、モニタに移るには[Ｆ10]キ 　ーを押す。 ※パラメータは全て16進数で与える。またファイル名は６文字以内とする。 ※出力の一時停止は[STOP]キー、中止は[CTRL]-[STOP]で行う。 ※〔　〕内のパラメータは省略可能。 ■■■■■■■■■■■■■■■■■■■ 　　　　　　コンパイラ ■■■■■■■■■■■■■■■■■■■ コンパイラの基本的な言語仕様は ＴＬ／１−ＰＣと完全なコンパチビリティーを持ってます。 これに関しては付属の『ＴＬ／１リファレンスマニュアル』を 参考にして下さい。 コンパイル中に表示するエラーは、 オブジェクトの実行時に表示されるものを含めて 表３にまとめであります。 コンパイル時の文法エラーは、 ＰＣ版では単に「ＥＲＲＯＲ」としか表示されませんでしたが、 ＴＬ／Ｘではこれを２通りに分類しました。 宣言されていない単語が発見された場合に表示される「Undeclared」と それ以外の場合に表示される「Error Syntax」です。 しかし、この分類はまだ不完全で、 不適当なメッセージが表示される場合もあります。 ただし、ＴＬ／Ｘでは コンパイとエディタが共存している利点を最大に生かして、 エラーの発生と同時にエディタが起動されます。 この時、まずエラーの発見された行が 行番号付きで表示されます。 次にその行番号無しで表示されて、 そのまま「エディタ・モード」に入ります。 さらにカーソルは、コンパイラがエラーを発見して コンパイルを打ち切った最後の文字の上に現れます。 これにより、殆どの場合どこにエラーがあるかを 発見することができます。 また、簡単にエラーを修正することも可能です。 しかし、ここで「殆どの場合」と言ったのは、 エラーの発見された行に必ずしもエラーがあるとは限らないからです。 エラーの「種」はもっと上の方でまかれたのかもしれないということです。 この「エラー→エディット機能」が働くのは、 “Ｃ”または“ＣＯ”コマンドで コンパイラを起動したときのみです。 “ＣＴ”コマンドの場合は、 エラーを発見するとモニタにとんでしまいます。 理由は、書くまでもないことですが、 “ＣＴ”コマンド使用時にはメモリ中にソースプログラムが有りませんし、 場合によってはもうエディタも無くなっているかもしれないからです。 コンパイルしたオブジェクトの実行終了時には、ＢＡＳＩＣに飛びます。 このときＢＡＳＩＣのブレークルーチンを使っていますので、 「Ｂｒｅａｋ」と表示されます。 ここでＢＡＳＩＣが登場するのは不似合いな気もしますが。 オブジェクトを単独で実行する場合を考えると、 モニタヘ飛ばすわけにもいかず、このようにしました。 ＢＡＳＩＣからエディタまたはモニタヘ戻るには 前述のように[Ｆ１]／[Ｆ10]キーを使用して下さい。 表３　ＴＬ／Ｘエラーメッセージ ・―――――――――――――――――――――――――――・ ｜::::メッセージ::::::｜::::::::::意::::::::味::::::::::｜ ｜――――――――――＋――――――――――――――――｜ ｜Error Sysntex　　 ｜構文エラー　　　　　　　　　　　｜ ｜Undeclares　　　 ｜未定義の単語を使った　　　　　　｜ ｜Too Many Identifiers｜手続き、関数の数が多すぎる　　　｜ ｜Too Many Variables ｜変数、配列の数が多すぎる　　　　｜ ｜Object Too Long ｜オブジェクトプログラムが長すぎる｜ ｜Division by 0 ｜０で割ろうとした　　　　　　　　｜ ・―――――――――――――――――――――――――――・ ■■■■■■■■■■■■■■■■■■■ 　　　　　標準ライブラリ機能 ■■■■■■■■■■■■■■■■■■■ ＴＬ／Ｘのもう一つの特徴は、ライブラリ機能の豊富さにあります。 ライブラリとして組み込まれている手続き、関数を表４に示します。 ほとんどのものはＭＳＸ−ＢＡＳＩＣと パラメータ順を同じにしてあるので説明は省略します。 ただし、グラフィック座標の指定に“STEP”は使えません。 また、エラーチェックを省いているものが多いので、 不適当なパラメータを与えると異常動作をする可能性があります。 注意して下さい。 ここでは、ＢＡＳＩＣとパラメータの与え方の異なるもの およびＢＡＳＩＣでサートしていないものについてのみ解説します。 手続き“CIRCLE”のパラメータは 順にＸ座標、Ｙ座標、半径、カラー、アスペクト比です。 アスペクト比はＢＡＳＩＣと異なり、０〜 255の値をとります。 ＣＲＴによっても異なりますが、 140程度で真円に見えます。 手続き“LINE”の６番目のパラメータは０、１、２のいずれかの値をとり、 ０を指定した場合は普通の直線、１はボックス、２はボックスフィルとなります。 つまり、ＢＡＳＩＣの“Ｂ”、“ＢＦ”に対応します。 手続き“PUTSPRITE” の４番目のパラメータはカラーですが、 この値のbit7を立てることにより、 スプライトの表示位置を左に１スプライト分だけシフトすることができます。 具体的には、０〜15のカラーコードの代わりに128〜143を使います。 これは、Ｘ座標の指定に負数を使用できないので、 スプライトに画面の左側に消えていくような働きをさせるための機能です。 手続き“PAINT” の４番目のパラメータは、 マルチカラーモードのときのみ有効で、 ハイレゾリューションモードでは意味を持たないので省略しても構いません。 手続き“SCREEN”のパラメータは３つだけです。 「カセットボーレイト」と「プリンタオプション」の指定は、 必要ならばＴＬ／Ｘを起動する以前にＢＡＳＩＣで行って下さい。 手続き“SPRITE”はＢＡＳＩＣの 「SPRITE$(N)=文字列」 という文に対応するもので、 Ｎはスプライト番号を示し、それ以後のパラメータでデータを与えます。 データ数はスプライトサイズにより８または16個です。 手続き“VPOKE” および関数“VPEEK” で指定するアドレスは、 上位、下位の順に２個のパラメータを使って指定します。 手続き“KEY” は、ファンクションキーの表示をＯＮ／ＯＦＦするもので、 Ｎ＝０で表示を消し、０以外で表示します。 関数“TIME”は、パラメータを取らないので、 特殊変数とも言えるものですが、 ＭＳＸの時計カウンタの下位１byteを返します。 関数“KEYPORT” は図２に示した キーマトリクスの行（０〜８）を指定することにより、 その行に配列されたキーボードの状態を返すもので、 押されているキーは０、押されていないものは１の値を持ちます。 例えば“Ｒ”と“Ｌ”のキーを押しているときに、 ・―――――――――――――――――・ ｜I:=KETYPORT(4)　　　　　　　　　　｜ ・―――――――――――――――――・ を実行すれば、Ｉには“01111101” すなわち 125が代入されます。 関数“ROMOS” は手続さとして使用しても構いませんが、 AH、ALで指定されるアドレスをコールして ACCの値を持ち帰るものです。 表に示したパラメータによって、フラグレジスタと裏レジスタを除く 全てのレジスタに値を引き渡すことが可能です。 この関数に限らず、全てのライブラリ手続き、関数において、 パラメータは必要なところまで指定すればよく、 それ以後は省略しても構いません。 ただし、その場合にはどんな値が渡されるか全く保障できません。 また途中のパラメータを省略することはできません。 ライブラリ機能ではありませんが、出力装置として拡張されたものがあります。 ０、１番はＴＬ／１の標準出力装置であるＣＲＴとプリンタですが、 ２番にグラフィック画面への文字出力を割り当ててあります。 これはＢＡＳＩＣの ・――――――――――――――――――――――――――・ ｜OPEN"GRP:"FOR OUTPUT AS#1 　　　　　　　　　　　　　｜ ｜PRINT #1,文字列 　　　　　　　　　　　　　　　　　　｜ ・――――――――――――――――――――――――――・ によって実現される機能に対応したものです。 さらに３番目にはＢＡＳＩＣの「PLAY」文に 相当する機能を持たせてあります。 ・――――――――――――――――――――――――――・ ｜WRITE(3:"ﾏｸﾛ1,ﾏｸﾛ2,ﾏｸﾛ3") 　　　　　　　　　　　　　｜ ・――――――――――――――――――――――――――・ というＴＬ／Ｘの表現は、ＢＡＳＩＣの ・――――――――――――――――――――――――――・ ｜PLAY"ﾏｸﾛ1","ﾏｸﾛ2","ﾏｸﾛ3"　　　　　　　　　　　　　　｜ ・――――――――――――――――――――――――――・ に対応します。 ただし、マクロ言語中には変数の使用はできません。 また、ＢＡＳＩＣのように文字列を３つの書くのではなく、 １つの文字列を“，”で３つに区切ることに注意して下さい。 ３声同時に発生させるのでなければ「マクロ２」以降は省略しても構いません。 次のように書くことができます。 ・――――――――――――――――――――――――――・ ｜WRITE(3:"ﾏｸﾛ1,ﾏｸﾛ2")　　　　　　　　　　　　　　　　｜ ｜WRITE(3:"ﾏｸﾛ1") 　　　　　　　　　　　　　　　　　　｜ ・――――――――――――――――――――――――――・ ここで、ＴＬ／Ｘの入出力装置を表５にまとめておきます。 入出力装置の１番目以降、出力装置の４番目以降は未定義です。 表４　ＴＬ／Ｘライブラリ機構 ・―――――――――――――――――――――――――――――――――――――・ ｜::::手::::続::::き::::｜::::::::::::パ::ラ::メ::ー::タ::解::説::::::::::::｜ ｜―――――――――――＋―――――――――――――――――――――――――｜ ｜Circle(x,y,r,c,a) ｜x,y:円の中心 r:円の半径 c:ｶﾗｰ a:ｱｽﾍﾟｸﾄ比（真円は ｜ ｜ ｜ 140程度）｜ ｜Color(f,k,b)　　　　　｜f:ﾌｧｵｸﾞﾗﾝﾄﾞ k:ﾊﾞｯｸｸﾞﾗﾝﾄﾞ b:ﾎﾞｰﾀﾞｰ ｜ ｜Line(x1,y1,x2,y2,c,b) ｜x1,y1:始点座標 x2,y2:終点座標 c:ｶﾗｰ b:ｵﾌﾟｼｮﾝ(0: ｜ ｜ ｜　　 ﾗｲﾝ 1:ﾎﾞｯｸｽ 2:ﾎﾞｯｸｽﾌｨﾙ)｜ ｜Locate(x,y,c) ｜x,y:座標 c:ｶｰｿﾙｽｲｯﾁ(0:消去 1:表示) ｜ ｜Putsprite(n,x,y,c,s) ｜n:ｽﾌﾟﾗｲﾄ面　x,y:座標　c:ｶﾗｰ(Bit7を立てると左ｼﾌﾄ) ｜ ｜ ｜s:ｽﾌﾟﾗｲﾄ番号 ｜ ｜Paint(x,y,c,i) ｜x,y:開始座標 c:ｶﾗｰ i:境界色 ｜ ｜Pset(x,y,c) ｜x,y:座標 c:ｶﾗｰ ｜ ｜Preset(x,y) ｜x,y:座標 ｜ ｜Screen(m,s,k) ｜m:ﾓｰﾄﾞ s:ｽﾌﾟﾗｲﾄｻｲｽﾞ k:ｷｰｸﾘｯｸｽｨｯﾁ ｜ ｜Sprite(n,d0…d7/d15) ｜n:ｽﾌﾟﾗｲﾄ番号 d1〜d15：定義ﾃﾞｰﾀ ｜ ｜Vpoke(ah,al,d) ｜ah,al:ｱﾄﾞﾚｽ d:ﾃﾞｰﾀ ｜ ｜Key(n) ｜n:ﾌｧﾝｸｼｮﾝｷｰ表示（n=0で消去） ｜ ｜Sound(n,m) ｜n:PSGﾚｼﾞｽﾀ番号 m:ﾃﾞｰﾀ ｜ ｜Width(n) ｜n:1行文字数 ｜ ｜―――――――――――＋―――――――――――――――――――――――――｜ ｜::::関::::::::::数::::｜::::::::::::::::機::::::::::::::::能::::::::::::::｜ ｜―――――――――――＋―――――――――――――――――――――――――｜ ｜Point'x,y) ｜x,y:座標(指定した座標のｶﾗｰｺｰﾄﾞを返す) ｜ ｜Vpeek(ah,al) ｜ah,al:ｱﾄﾞﾚｽ(VRAMﾃﾞｰﾀを返す) ｜ ｜Stick(n) ｜n:ｼﾞｮｲｽﾃｨｯｸ番号 ｜ ｜String(n) ｜n:ｼﾞｮｲｽﾃｨｯｸ番号 ｜ ｜Time ｜内部時計変数の下位ﾊﾞｲﾄを返す ｜ ｜Keyport(n) ｜nで指定したｷｰﾏﾄﾘｸｽのROWの状態を返す ｜ ｜pdl(n) ｜nで指定されたﾊﾟﾄﾞﾙの状態を返す ｜ ｜pad(n) ｜nで指定されたﾊﾟｯﾄﾞの状態を返す ｜ ｜Romos(ah,al,a,h,l,d,e,｜ah,alで指定したｱﾄﾞﾚｽをそれ以下で指定したﾚｼﾞｽﾀﾃﾞｰﾀ ｜ ｜b,c,ixh,ixl,iyh,iyl) ｜ﾃﾞｰﾀを持ってｺｰﾙする。ﾘﾀｰﾝ時のAccの値を返す。 ｜ ｜ ｜ﾚｼﾞｽﾀは省略可能。文としても使用可能 ｜ ・―――――――――――――――――――――――――――――――――――――・ 表５　入出力装置 ・――――――――――――――――――――・ ｜::::｜::装置番号::｜::::装::::::::置::::｜ ｜――＋――――――＋――――――――――｜ ｜　　｜　　０　　　｜　　キーボード　　　｜ ｜入力｜――――――＋――――――――――｜ ｜　　｜　　――　　｜　　―――――　　　｜ ｜――＋――――――＋――――――――――｜ ｜　　｜　　０　　　｜　　　ＣＲＴ　　　　｜ ｜　　｜――――――＋――――――――――｜ ｜　　｜　　１　　　｜　　プリンタ　　　　｜ ｜出力｜――――――＋――――――――――｜ ｜　　｜　　２　　　｜　グラフィック画面　｜ ｜　　｜――――――＋――――――――――｜ ｜　　｜　　３　　　｜　ＢＧＭ（本文参照）｜ ｜　　｜――――――＋――――――――――｜ ｜　　｜　　――　　｜　　―――――　　　｜ ・――――――――――――――――――――・ ■■■■■■■■■■■■■■■■■■■ 　　　　　　ここらで一息 ■■■■■■■■■■■■■■■■■■■ 以上ＴＬ／Ｘについて駆け足で解説しましたが、 だいたいの使い方が理解していただけたかと思います。 解かりにくかった点も多いかと思いますが、 実際に使っていただければそれほど難しいものではないと思います。 次回はライブラリ機能の拡張の方法を始めとする、より高度な使い方、 使用しているＲＯＭＯＳの解説等、 ＴＬ／Ｘを骨の髄までしゃぶるための情報をお届けする予定です。